
Partial Class Blogs_Default
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Panel1.Visible = User.IsInRole("Blogger")
    End Sub

    Protected Sub BlogsDataSouce_Selecting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.ObjectDataSourceSelectingEventArgs) Handles BlogsDataSouce.Selecting
        pn1.Count = ClubStarterKit.Web.Blogs.NumPages()
    End Sub
End Class
